package org.boz.dial;

import junit.framework.TestCase;

public class LispConsTest extends TestCase {
	public void testConsCarCdr() {
		LispObject o1 = new LispCons(new LispInt(1), new LispInt(2));
		assertEquals(o1.car(), new LispInt(1));
		assertEquals(o1.cdr(), new LispInt(2));
		assertEquals(new LispCons(o1.car(), o1.cdr()), o1);
	}
}
